(insert-register): Add `*' interactive spec.

diff --git a/lisp/register.el b/lisp/register.el
index 97f5ea6dedfdc24b20a74dc682113fe66e3acd8a..ccf30c9a70c10db4743dad25403b1726c64cb28e 100644 (file)
--- a/lisp/register.el
+++ b/lisp/register.el
@@ -185,7 +185,7 @@ REGISTER is a character."
 Normally puts point before and mark after the inserted text.
 If optional second arg is non-nil, puts mark before and point after.
 Interactively, second arg is non-nil if prefix arg is supplied."
-  (interactive "cInsert register: \nP")
+  (interactive "*cInsert register: \nP")
   (push-mark)
   (let ((val (get-register char)))
     (cond